COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	.device xgp
C00003 ENDMK
C⊗;
.device xgp
.COUNT FOOTNOTE INLINE  from 1 TO 99 BY 1 printing ⊂"%8#{FOOTNOTE}%*"⊃;

.AT "⊗↓" ENTRY "←" ⊂NEXT FOOTNOTE ;! ;
.SEND FOOT ⊂
.BEGIN "FOOT";select 1;
.FILL
.INDENT par,0;
{!}ENTRY
.BREAK
.END "FOOT" ⊃ ⊃

.VARIABLE FIRST_PAR,par; <<**********>>
.par←6;<<**********>>

.MACRO CENT (NAME,PHRASE) ⊂IF LINES ≤ 7 THEN SKIP TO COLUMN 1;;
.CAT("PHRASE","NAME");
.BEGIN CENTER PT24
%2NAME%*
.PT18; END
.⊃

.REQUIRE "MACROS" SOURCE_FILE;
.FOOTSEP ← "________________"
.REQUIRE "bib.pub" SOURCE_FILE;
.REQUIRE "sdt" SOURCE_FILE;
.REQUIRE "BACK" SOURCE_FILE;